//========================================================================
//  SE5 Empire Setup - Neutral 007 - Captain Kwok's Balance Mod v125+
//========================================================================
//
// Neutral 007 Ophoolo Consortium
// Rock + Oxygen, Oligarchy + Politicians
//

#include Script_AI_GlobalResearch.txt

//------------------------------------------------------------------------
// Global Constants
//------------------------------------------------------------------------

//------------------------------------------------------------------------
// Global Variables
//------------------------------------------------------------------------

//------------------------------------------------------------------------
// Forward Declarations
//------------------------------------------------------------------------

//------------------------------------------------------------------------
// Main
//------------------------------------------------------------------------
function Main returns boolean
vars
  racial_pts:                long
  research_pts:              long
begin

  // Get our racial trait and starting research points
  set racial_pts := Sys_AI_Setup_Get_Racial_Points_Remaining(sys_long_Player_ID)
  set research_pts := Sys_AI_Setup_Get_Research_Points_Remaining(sys_long_Player_ID)

  // Neutral 007 setup preferences
  set bool_Race_Uses_Mines                                 := TRUE
  set bool_Race_Uses_Fighters                              := TRUE
  set bool_Race_Uses_Satellites                            := TRUE
  set bool_Race_Uses_Troops                                := TRUE
  set bool_Race_Uses_Weapon_Platforms                      := TRUE
  set bool_Race_Uses_Drones                                := TRUE
  set bool_Race_Uses_Kamikaze_Ships                        := FALSE
  set bool_Race_Uses_Boarding_Ships                        := FALSE
  set bool_Race_Uses_Bombardment_Ships                     := FALSE
  set bool_Race_Uses_Plague_Ships                          := FALSE
  set bool_Race_Uses_Normal_Armor                          := TRUE
  set bool_Race_Uses_Normal_Shields                        := TRUE
  set bool_Race_Uses_Cloaking_Devices                      := FALSE
  set bool_Race_Uses_Master_Computers                      := FALSE

  set bool_Race_Uses_Psychic_Tech                          := TRUE
  set bool_Race_Uses_Psychic_Weapons                       := TRUE

  set bool_Race_Uses_Energy_Pulse_Weapons                  := TRUE

  // Debug output
  call Sys_Debug_Print("Setup", "------------------------")
  call Sys_Debug_Print("Setup", "Racial Trait Selections:")
  call Sys_Debug_Print("Setup", "  - Starting Points = " + Sys_Convert_Long_To_String(racial_pts))

  // AI Assist
  if Sys_Are_We_Computer_Player(sys_long_Player_ID) then
    call Add_Racial_Trait("AI Assist") // 0
  endif

  // Neutral 007 Racial Traits
  // 2000 Pts
  call Add_Racial_Trait("Psychic") // 1,000
  call Add_Racial_Trait("Lucky") // 500
  call Add_Racial_Trait("Cunning") // 500
  // 3000 Pts
  call Add_Racial_Trait("Naturally Happy") // 500
  call Add_Racial_Trait("Bunglers") // -500
  call Add_Racial_Trait("Propulsion Experts") // 1,000
  // 5000 Pts
  call Add_Racial_Trait("Natural Merchants") // 1,000
  call Add_Racial_Trait("Advanced Power Conservation") // 1,000

  // Debug output
  call Sys_Debug_Print("Setup", "----------------------")
  call Sys_Debug_Print("Setup", "Technology Selections:")
  call Sys_Debug_Print("Setup", "  - Starting Points = " + Sys_Convert_Long_To_String(research_pts))

  // Neutral 007 low tech start (5,000 Default)
  if (research_pts > 0) and (research_pts <= 5000) then
    call Add_Tech_area("Sensors", 3, TRUE, FALSE) // 5,000
  endif

  // Neutral 007 medium tech start (50,000 Default; 25,000 = High Cost; 100,000 = Low Cost)
  if (research_pts > 5000) and (research_pts <= 100000) then
    call Add_Tech_Area("Physics", 2, TRUE, FALSE) // 12,000
    // Sub-Total 12,000 (12,000)
    call Add_Tech_Area("Stellar Harnessing", 1, TRUE, FALSE) // 2,000
    call Add_Tech_Area("Shields", 1, TRUE, FALSE) // 2,000
    call Add_Tech_Area("Sensors", 4, TRUE, FALSE) // 9,000
    // Sub-Total 13,000 (25,000)
    call Add_Tech_Area("Repair", 1, TRUE, FALSE) // 1,000
    call Add_Tech_Area("Small Ship Construction", 2, TRUE, FALSE) // 4,000
    call Add_Tech_Area("Ion Engines", 3, TRUE, FALSE) // 10,000
    call Add_Tech_Area("Armor", 3, TRUE, FALSE) // 5,000
    call Add_Tech_Area("Medical Treatment", 1, TRUE, FALSE) // 2,000
    // Sub-Total 22,000 (47,000)
    call Add_Tech_Area("Energy Pulse Weapons", 1, bool_Race_Uses_Energy_Pulse_Weapons, FALSE) // 3,000
    // Sub-Total 4,000 (50,000)
    call Add_Tech_Area("Psychic Technology", 3, bool_Race_Uses_Psychic_Tech, FALSE) // 10,000
    call Add_Tech_Area("Psychic Weapons", 3, bool_Race_Uses_Psychic_Weapons, FALSE) // 15,000
    // Sub-Total 25,000 (75,000)
    call Add_Tech_Area("Military Science", 2, TRUE, FALSE) // 10,000
    // Sub-Total 10,000 (85,000)
    call Add_Tech_Area("Small Ship Construction", 3, TRUE, FALSE) // 6,000
    call Add_Tech_Area("Armor", 4, TRUE, FALSE) // 4,000
    call Add_Tech_Area("Defense Systems", 1, TRUE, FALSE) // 2,000
    // Sub-Total 12,000 (97,000)
    call Add_Tech_Area("Troop Weapons", 2, TRUE, FALSE) // 1,000
    call Add_Tech_Area("Smaller Weapons", 2, TRUE, FALSE) // 2,000
    // Sub-Total 3,000 (100,000)
  endif

  // Neutral 007 high tech start (500,000 Default; 250,000 = High Cost; 1,000,000 = Low Cost)
  if (research_pts > 100000) then
    call Add_Tech_Area("Ice Planet Colonization", 1, TRUE, FALSE) // 50,000
    call Add_Tech_Area("Gas Giant Colonization", 1, TRUE, FALSE) // 50,000
    // Sub-Total 100,000 (100,000)
    call Add_Tech_Area("Psychic Technology", 3, bool_Race_Uses_Psychic_Tech, FALSE) // 10,000
    call Add_Tech_Area("Psychic Weapons", 3, bool_Race_Uses_Psychic_Weapons, FALSE) // 15,000
    // Sub-Total 25,000 (125,000)
    call Add_Tech_Area("Construction", 2, TRUE, FALSE) // 12,000
    call Add_Tech_Area("Military Science", 2, TRUE, FALSE) // 10,000
    call Add_Tech_Area("Physics", 2, TRUE, FALSE) // 12,000
    // Sub-Total 34,000 (159,000)
    call Add_Tech_Area("Repair", 1, TRUE, FALSE) // 1,000
    call Add_Tech_Area("Small Ship Construction", 6, TRUE, FALSE) // 40,000
    call Add_Tech_Area("Medium Ship Construction", 1, TRUE, FALSE) // 6,000
    call Add_Tech_Area("Mines", 1, TRUE, FALSE) // 4,000
    call Add_Tech_Area("Stellar Harnessing", 1, TRUE, FALSE) // 2,000
    call Add_Tech_Area("Armor", 3, TRUE, FALSE) // 5,000
    call Add_Tech_Area("Shields", 1, TRUE, FALSE) // 2,000
    call Add_Tech_Area("Sensors", 4, TRUE, FALSE) // 9,000
    call Add_Tech_Area("Defense Systems", 3, TRUE, FALSE) // 12,000
    // Sub-Total 81,000 (240,000)
    call Add_Tech_Area("Energy Pulse Weapons", 1, bool_Race_Uses_Energy_Pulse_Weapons, FALSE) // 3,000
    call Add_Tech_Area("Point-Defense Weapons", 2, TRUE, FALSE) // 4,000
    call Add_Tech_Area("Troop Weapons", 2, TRUE, FALSE) // 1,000
    call Add_Tech_Area("Smaller Weapons", 2, TRUE, FALSE) // 2,000
    // Sub-Total 10,000 (250,000)
    call Add_Tech_Area("Biology", 2, TRUE, FALSE) // 6,000
    call Add_Tech_Area("Chemistry", 2, TRUE, FALSE) // 12,000
    call Add_Tech_Area("Construction", 3, TRUE, FALSE) // 18,000
    // Sub-Total 36,000 (286,000)
    call Add_Tech_Area("Space Yards", 3, TRUE, FALSE) // 20,000
    call Add_Tech_Area("Troops", 3, TRUE, FALSE) // 5,000
    call Add_Tech_Area("Fighters", 3, TRUE, FALSE) // 25,000
    call Add_Tech_Area("Vehicle Systems", 2, TRUE, FALSE) // 6,000
    call Add_Tech_Area("Ion Engines", 3, TRUE, FALSE) // 10,000
    call Add_Tech_Area("Contra-Terrene Engines", 3, TRUE, FALSE) // 24,000
    call Add_Tech_Area("Applied Research", 3, TRUE, FALSE) // 30,000
    call Add_Tech_Area("Robotics", 1, TRUE, FALSE) // 6,000
    call Add_Tech_Area("Medical Treatment", 2, TRUE, FALSE) // 6,000
    call Add_Tech_Area("Minerals Extraction", 2, TRUE, FALSE) // 8,000
    call Add_Tech_Area("Organics Extraction", 2, TRUE, FALSE) // 4,000
    // Sub-Total 144,000 (430,000)
    call Add_Tech_Area("Weapon Mounts", 1, TRUE, FALSE) // 1,000
    call Add_Tech_Area("Ship Weapon Mounts", 5, TRUE, FALSE) // 15,000
    call Add_Tech_Area("Psychic Weapons", 4, bool_Race_Uses_Psychic_Weapons, FALSE) // 12,000
    call Add_Tech_Area("Energy Pulse Weapons", 3, bool_Race_Uses_Energy_Pulse_Weapons, FALSE) // 15,000
    call Add_Tech_Area("Point-Defense Weapons", 3, TRUE, FALSE) // 6,000
    // Sub-Total 49,000 (479,000)
    call Add_Tech_Area("Cultural Studies", 1, TRUE, FALSE) // 3,000
    call Add_Tech_Area("Economics", 1, TRUE, FALSE) // 3,000
    call Add_Tech_Area("Education", 1, TRUE, FALSE) // 3,000
    call Add_Tech_Area("Environment", 2, TRUE, FALSE) // 6,000
    call Add_Tech_Area("Recreation", 3, TRUE, FALSE) // 6,000
    // Sub-Total 21,000 (500,000)
    call Add_Tech_Area("Psychic Technology", 4, bool_Race_Uses_Psychic_Tech, FALSE) // 8,000
    call Add_Tech_Area("Psychic Weapons", 6, bool_Race_Uses_Psychic_Weapons, FALSE) // 33,000
    // Sub-Total 41,000 (541,000)
    call Add_Tech_Area("Astrophysics", 2, TRUE, FALSE) // 12,000
    call Add_Tech_Area("Chemistry", 3, TRUE, FALSE) // 18,000
    call Add_Tech_Area("Industry", 3, TRUE, FALSE) // 25,000
    call Add_Tech_Area("Planetary Engineering", 1, TRUE, FALSE) // 10,000
    call Add_Tech_Area("Psychology", 1, TRUE, FALSE) // 3,000
    // Sub-Total 68,000 (609,000)
    call Add_Tech_Area("Medium Ship Construction", 6, TRUE, FALSE) // 120,000
    call Add_Tech_Area("Large Ship Construction", 1, TRUE, FALSE) // 10,000
    call Add_Tech_Area("Small Base Construction", 4, TRUE, FALSE) // 27,000
    call Add_Tech_Area("Vehicle Systems", 3, TRUE, FALSE) // 9,000
    call Add_Tech_Area("Resupply", 6, TRUE, FALSE) // 20,000
    call Add_Tech_Area("Shields", 3, TRUE, FALSE) // 10,000
    call Add_Tech_Area("Sensors", 8, TRUE, FALSE) // 26,000
    call Add_Tech_Area("Defense Systems", 5, TRUE, FALSE) // 18,000
    call Add_Tech_Area("Cargo", 4, TRUE, FALSE) // 9,000
    call Add_Tech_Area("Storage", 6, TRUE, FALSE) // 20,000
    call Add_Tech_Area("Applied Research", 4, TRUE, FALSE) // 24,000
    call Add_Tech_Area("Applied Political Science", 2, TRUE, FALSE) // 9,000
    call Add_Tech_Area("Planet Utilization", 3, TRUE, FALSE) // 12,000
    call Add_Tech_Area("Resource Manipulation", 2, TRUE, FALSE) // 15,000
    call Add_Tech_Area("Minerals Extraction", 3, TRUE, FALSE) // 12,000
    call Add_Tech_Area("Organics Extraction", 2, TRUE, FALSE) // 2,000
    call Add_Tech_Area("Radioactives Extraction", 3, TRUE, FALSE) // 15,000
    // Sub-Total 358,000 (967,000)
    call Add_Tech_Area("Energy Pulse Weapons", 5, bool_Race_Uses_Energy_Pulse_Weapons, FALSE) // 27,000
    call Add_Tech_Area("Tractor\Repulser Weapons", 2, TRUE, FALSE) // 3,000
    call Add_Tech_Area("Smaller Weapons", 3, TRUE, FALSE) // 3,000
    // Sub-Total 33,000 (1,000,000)
  endif

  // If there are setup points remaining, spend them
  if (Sys_AI_Setup_Get_Research_Points_Remaining(sys_long_Player_ID) > 1000) then
    call AI_Research_Selection()
  endif

  return TRUE
end

//------------------------------------------------------------------------